home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Internet 2001 September / MICD2001_09_NR2.iso / PHP-Nuke / Comfort / setup.exe / {app} / dqLIB / dqdir.php3.bak < prev    next >
Text File  |  2000-01-29  |  1KB  |  58 lines

  1. <?php
  2.  
  3. # To jest plik typu biblioteki,
  4. # pokazuje zawarto£µ katalogu, 
  5. # mo┐e te┐ tworzyµ linki do plik≤w i katalog≤w w katalogu
  6.  
  7. class dqdir {
  8. #dqPHP;
  9. #dqClassBegin;
  10. #dqClassName($dqdir);
  11. #dqPHPBegin;
  12. #dqString;
  13. #dqName($dirpath=)
  14. #dqText(Bazowy katalog)
  15. #dqPHPEnd;
  16. #dqClassEnd;
  17.  
  18.     
  19.     var $dirpath = '.';        # Scie┐ka katalogu - '.' aktualny
  20.     var $handle;        
  21.         
  22.      Function FOpenDir () {    # Funkcja otwiera dostΩp do katalogu - nie jest zalecane jej bezpo£rednie wywo│ywanie
  23.                   
  24.          $this->handle=opendir($this->dirpath);
  25.          echo "$this->handle";}      
  26.      
  27.      Function FCloseDir () {    # Funkcja  zamyk dostΩp do katalogu - nie jest zalecane jej bezpo£rednie wywo│ywanie
  28.                   
  29.          closedir($this->handle);}
  30.      
  31.      Function ShowDir () {    # Funkcja pokazuje zawarto£µ katalogu
  32.          
  33.      $this->FOpenDir ();
  34.      while ($file = readdir($this->handle)) {
  35.                 echo "$file <BR>";}
  36.              $this->FCloseDir ();}
  37.      
  38.      Function ShowDirAsLink () { # Funkcja pokazuje zawarto£µ katalogu i tworzy linki do pik≤w
  39.          
  40.      $this->FOpenDir ();
  41.      while ($file = readdir($this->handle)) {
  42.                 echo "<A HREF=$file> $file <BR>";}
  43.              $this->FCloseDir ();}
  44.      
  45.      Function ShowInfo() {    # Funkcja informacje o  katalogu
  46.          
  47.      $Filenr=0;
  48.      $this->FOpenDir ();
  49.      while ($file=readdir($this->handle)) {
  50.                 $filenr++;}
  51.                 echo '<BR>Plik≤w i katalog≤w:'.$filenr;
  52.             $this->FCloseDir ();
  53.             }
  54.  
  55.     }
  56.     
  57. ?>
  58.